# name : Signed rank test for 1 arm ordinal data
# key : ordinal.1arm.signed.rank
# contributor: Shuguang Sun
# --
proc univariate data=${1:dtin} loccount mu0 = 50;
  var ${2:var};
run;